/ Human Doll / Human Doll.iso / Human-System / VLF-Apdx / VLF-Apdx.rsrc / STXT_1529

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 0c 00 00 06 c8 | 00 00 00 8e 2d 2d 0d 6d |........|....--.m|
|00000010| 61 63 72 6f 20 42 6f 6f | 74 55 70 43 68 65 63 6b |acro Boo|tUpCheck|
|00000020| 20 2d 2d 20 83 75 81 5b | 83 67 83 41 83 62 83 76 | -- .u.[|.g.A.b.v|
|00000030| 83 60 83 46 83 62 83 4e | 0d 20 20 20 20 67 6c 6f |.`.F.b.N|.    glo|
|00000040| 62 61 6c 20 43 6f 6c 6f | 72 46 6c 67 2c 20 67 53 |bal Colo|rFlg, gS|
|00000050| 74 61 67 65 4d 6f 64 0d | 20 20 20 20 73 65 74 20 |tageMod.|    set |
|00000060| 67 53 74 61 67 65 4d 6f | 64 20 74 6f 20 30 0d 20 |gStageMo|d to 0. |
|00000070| 20 20 20 69 66 20 28 28 | 74 68 65 20 73 74 61 67 |   if ((|the stag|
|00000080| 65 4c 65 66 74 20 3d 20 | 2d 36 34 29 20 61 6e 64 |eLeft = |-64) and|
|00000090| 20 28 74 68 65 20 73 74 | 61 67 65 54 6f 70 20 3d | (the st|ageTop =|
|000000a0| 20 2d 34 38 20 29 29 20 | 74 68 65 6e 20 73 65 74 | -48 )) |then set|
|000000b0| 20 67 5f 73 74 61 67 65 | 4c 65 76 65 6c 20 74 6f | g_stage|Level to|
|000000c0| 20 31 20 2d 2d 20 31 32 | 49 6e 63 68 0d 20 20 20 | 1 -- 12|Inch.   |
|000000d0| 20 0d 20 20 20 20 73 65 | 74 20 74 68 65 20 73 74 | .    se|t the st|
|000000e0| 61 67 65 43 6f 6c 6f 72 | 20 74 6f 20 32 35 35 0d |ageColor| to 255.|
|000000f0| 20 20 20 20 73 79 73 74 | 65 6d 63 68 6b 28 29 0d |    syst|emchk().|
|00000100| 20 20 20 20 69 66 20 28 | 74 68 65 20 72 65 73 75 |    if (|the resu|
|00000110| 6c 74 20 3d 20 54 52 55 | 45 29 20 74 68 65 6e 0d |lt = TRU|E) then.|
|00000120| 20 20 20 20 20 20 20 20 | 69 66 20 28 20 74 68 65 |        |if ( the|
|00000130| 20 63 6f 6c 6f 72 44 65 | 70 74 68 20 3d 20 33 32 | colorDe|pth = 32|
|00000140| 20 29 20 74 68 65 6e 0d | 20 20 20 20 20 20 20 20 | ) then.|        |
|00000150| 20 20 20 20 73 65 74 20 | 43 6f 6c 6f 72 46 6c 67 |    set |ColorFlg|
|00000160| 20 74 6f 20 33 0d 20 20 | 20 20 20 20 20 20 65 6c | to 3.  |      el|
|00000170| 73 65 20 69 66 28 20 74 | 68 65 20 63 6f 6c 6f 72 |se if( t|he color|
|00000180| 44 65 70 74 68 20 3d 20 | 31 36 20 29 20 74 68 65 |Depth = |16 ) the|
|00000190| 6e 0d 20 20 20 20 20 20 | 20 20 20 20 20 20 73 65 |n.      |      se|
|000001a0| 74 20 43 6f 6c 6f 72 46 | 6c 67 20 74 6f 20 32 0d |t ColorF|lg to 2.|
|000001b0| 20 20 20 20 20 20 20 20 | 65 6c 73 65 20 2d 2d 20 |        |else -- |
|000001c0| 38 42 69 74 0d 20 20 20 | 20 20 20 20 20 20 20 20 |8Bit.   |        |
|000001d0| 20 2d 2d 20 73 65 74 20 | 74 68 65 20 63 6f 6c 6f | -- set |the colo|
|000001e0| 72 44 65 70 74 68 20 74 | 6f 20 34 0d 20 20 20 20 |rDepth t|o 4.    |
|000001f0| 20 20 20 20 20 20 20 20 | 2d 2d 20 73 65 74 20 74 |        |-- set t|
|00000200| 68 65 20 63 6f 6c 6f 72 | 44 65 70 74 68 20 74 6f |he color|Depth to|
|00000210| 20 38 0d 20 20 20 20 20 | 20 20 20 20 20 20 20 73 | 8.     |       s|
|00000220| 65 74 20 43 6f 6c 6f 72 | 46 6c 67 20 74 6f 20 31 |et Color|Flg to 1|
|00000230| 0d 20 20 20 20 20 20 20 | 20 65 6e 64 20 69 66 0d |.       | end if.|
|00000240| 20 20 20 20 65 6c 73 65 | 0d 20 20 20 20 20 20 20 |    else|.       |
|00000250| 20 71 75 69 74 0d 20 20 | 20 20 65 6e 64 20 69 66 | quit.  |  end if|
|00000260| 0d 0d 6d 61 63 72 6f 20 | 73 79 73 74 65 6d 63 68 |..macro |systemch|
|00000270| 6b 20 20 2d 2d 20 83 56 | 83 58 83 65 83 80 8a c2 |k  -- .V|.X.e....|
|00000280| 8b ab 83 60 83 46 83 62 | 83 4e 0d 20 20 20 20 2d |...`.F.b|.N.    -|
|00000290| 2d 20 83 4a 83 89 81 5b | 89 e6 96 ca 83 60 83 46 |- .J...[|.....`.F|
|000002a0| 83 62 83 4e 0d 20 20 20 | 20 69 66 20 28 74 68 65 |.b.N.   | if (the|
|000002b0| 20 63 6f 6c 6f 72 51 44 | 20 3d 20 46 41 4c 53 45 | colorQD| = FALSE|
|000002c0| 29 20 74 68 65 6e 0d 20 | 20 20 20 20 20 20 20 61 |) then. |       a|
|000002d0| 6c 65 72 74 20 22 53 6f | 72 72 79 2c 20 54 68 69 |lert "So|rry, Thi|
|000002e0| 73 20 6d 6f 76 69 65 20 | 72 65 71 75 69 72 20 43 |s movie |requir C|
|000002f0| 4f 4c 4f 52 20 4d 61 63 | 69 6e 74 73 68 22 0d 20 |OLOR Mac|intsh". |
|00000300| 20 20 20 20 20 20 20 72 | 65 74 75 72 6e 20 46 41 |       r|eturn FA|
|00000310| 4c 53 45 0d 20 20 20 20 | 65 6e 64 20 69 66 0d 20 |LSE.    |end if. |
|00000320| 20 20 20 2d 2d 20 51 75 | 69 63 6b 54 69 6d 65 20 |   -- Qu|ickTime |
|00000330| 83 60 83 46 83 62 83 4e | 0d 20 20 20 20 69 66 20 |.`.F.b.N|.    if |
|00000340| 28 74 68 65 20 71 75 69 | 63 6b 54 69 6d 65 50 72 |(the qui|ckTimePr|
|00000350| 65 73 65 6e 74 20 20 3d | 20 46 41 4c 53 45 29 20 |esent  =| FALSE) |
|00000360| 74 68 65 6e 0d 20 20 20 | 20 20 20 20 20 61 6c 65 |then.   |     ale|
|00000370| 72 74 20 22 53 6f 72 72 | 79 2c 20 54 68 69 73 20 |rt "Sorr|y, This |
|00000380| 6d 6f 76 69 65 20 72 65 | 71 75 69 72 20 51 75 69 |movie re|quir Qui|
|00000390| 63 6b 54 69 6d 65 20 31 | 2e 35 20 6f 72 20 6c 61 |ckTime 1|.5 or la|
|000003a0| 74 65 72 22 0d 20 20 20 | 20 20 20 20 20 72 65 74 |ter".   |     ret|
|000003b0| 75 72 6e 20 46 41 4c 53 | 45 0d 20 20 20 20 65 6e |urn FALS|E.    en|
|000003c0| 64 20 69 66 0d 20 20 20 | 20 2d 2d 20 95 4b 97 76 |d if.   | -- .K.v|
|000003d0| 83 81 83 82 83 8a 83 60 | 83 46 83 62 83 4e 0d 20 |.......`|.F.b.N. |
|000003e0| 20 20 20 69 66 20 28 74 | 68 65 20 6d 65 6d 6f 72 |   if (t|he memor|
|000003f0| 79 53 69 7a 65 20 3c 20 | 28 33 30 30 30 2a 31 30 |ySize < |(3000*10|
|00000400| 32 34 29 20 29 20 74 68 | 65 6e 0d 20 20 20 20 20 |24) ) th|en.     |
|00000410| 20 20 20 61 6c 65 72 74 | 20 22 72 65 71 75 69 65 |   alert| "requie|
|00000420| 72 64 20 6d 65 6d 6f 72 | 79 20 6c 65 73 73 22 20 |rd memor|y less" |
|00000430| 0d 20 20 20 20 20 20 20 | 20 72 65 74 75 72 6e 20 |.       | return |
|00000440| 46 41 4c 53 45 0d 20 20 | 20 20 65 6e 64 20 69 66 |FALSE.  |  end if|
|00000450| 0d 20 20 20 20 72 65 74 | 75 72 6e 20 54 52 55 45 |.    ret|urn TRUE|
|00000460| 0d 0d 6d 61 63 72 6f 20 | 72 65 61 64 50 69 63 74 |..macro |readPict|
|00000470| 75 72 65 20 72 65 61 64 | 43 61 73 74 2c 20 76 66 |ure read|Cast, vf|
|00000480| 4e 61 6d 65 2c 20 72 65 | 61 64 4d 6f 64 65 0d 20 |Name, re|adMode. |
|00000490| 20 20 20 73 65 74 20 6c | 72 65 74 20 74 6f 20 30 |   set l|ret to 0|
|000004a0| 0d 20 20 20 20 70 75 74 | 20 66 69 6c 65 49 4f 28 |.    put| fileIO(|
|000004b0| 6d 4e 65 77 2c 20 22 72 | 65 61 64 22 2c 20 76 66 |mNew, "r|ead", vf|
|000004c0| 4e 61 6d 65 29 20 69 6e | 74 6f 20 6d 79 50 69 63 |Name) in|to myPic|
|000004d0| 74 0d 20 20 20 20 69 66 | 20 6e 6f 74 20 6f 62 6a |t.    if| not obj|
|000004e0| 65 63 74 70 28 6d 79 50 | 69 63 74 29 20 74 68 65 |ectp(myP|ict) the|
|000004f0| 6e 20 72 65 74 75 72 6e | 20 28 2d 31 29 0d 20 20 |n return| (-1).  |
|00000500| 20 20 73 65 74 20 6c 4d | 65 6d 6f 72 79 20 74 6f |  set lM|emory to|
|00000510| 20 66 72 65 65 42 6c 6f | 63 6b 28 29 0d 20 20 20 | freeBlo|ck().   |
|00000520| 20 73 65 74 20 74 68 65 | 20 70 69 63 74 75 72 65 | set the| picture|
|00000530| 20 6f 66 20 63 61 73 74 | 20 72 65 61 64 43 61 73 | of cast| readCas|
|00000540| 74 20 74 6f 20 6d 79 50 | 69 63 74 28 6d 52 65 61 |t to myP|ict(mRea|
|00000550| 64 50 69 63 74 29 0d 20 | 20 20 20 69 66 20 28 28 |dPict). |   if ((|
|00000560| 72 65 61 64 4d 6f 64 65 | 29 20 41 4e 44 20 28 6c |readMode|) AND (l|
|00000570| 4d 65 6d 6f 72 79 20 3c | 20 66 72 65 65 42 6c 6f |Memory <| freeBlo|
|00000580| 63 6b 28 29 20 29 29 20 | 74 68 65 6e 0d 20 20 20 |ck() )) |then.   |
|00000590| 20 20 20 20 20 73 65 74 | 20 74 68 65 20 70 69 63 |     set| the pic|
|000005a0| 74 75 72 65 20 6f 66 20 | 63 61 73 74 20 72 65 61 |ture of |cast rea|
|000005b0| 64 43 61 73 74 20 74 6f | 20 74 68 65 20 70 69 63 |dCast to| the pic|
|000005c0| 74 75 72 65 20 6f 66 20 | 63 61 73 74 20 41 31 31 |ture of |cast A11|
|000005d0| 0d 20 20 20 20 20 20 20 | 20 75 6e 6c 6f 61 64 0d |.       | unload.|
|000005e0| 20 20 20 20 20 20 20 20 | 75 6e 6c 6f 61 64 43 61 |        |unloadCa|
|000005f0| 73 74 0d 20 20 20 20 20 | 20 20 20 73 65 74 20 6c |st.     |   set l|
|00000600| 4d 65 6d 6f 72 79 20 74 | 6f 20 66 72 65 65 42 6c |Memory t|o freeBl|
|00000610| 6f 63 6b 28 29 0d 20 20 | 20 20 20 20 20 20 73 65 |ock().  |      se|
|00000620| 74 20 74 68 65 20 70 69 | 63 74 75 72 65 20 6f 66 |t the pi|cture of|
|00000630| 20 63 61 73 74 20 72 65 | 61 64 43 61 73 74 20 74 | cast re|adCast t|
|00000640| 6f 20 6d 79 50 69 63 74 | 28 6d 52 65 61 64 50 69 |o myPict|(mReadPi|
|00000650| 63 74 29 0d 20 20 20 20 | 20 20 20 20 69 66 20 28 |ct).    |    if (|
|00000660| 28 6c 4d 65 6d 6f 72 79 | 2f 31 30 32 34 29 20 3c |(lMemory|/1024) <|
|00000670| 3d 20 28 66 72 65 65 42 | 6c 6f 63 6b 28 29 20 2f |= (freeB|lock() /|
|00000680| 20 31 30 32 34 29 20 29 | 20 74 68 65 6e 20 73 65 | 1024) )| then se|
|00000690| 74 20 6c 72 65 74 20 74 | 6f 20 2d 31 0d 20 20 20 |t lret t|o -1.   |
|000006a0| 20 65 6e 64 20 69 66 0d | 20 20 20 20 6d 79 50 69 | end if.|    myPi|
|000006b0| 63 74 28 6d 44 69 73 70 | 6f 73 65 29 0d 20 20 20 |ct(mDisp|ose).   |
|000006c0| 20 0d 20 20 20 20 72 65 | 74 75 72 6e 20 28 6c 72 | .    re|turn (lr|
|000006d0| 65 74 29 0d 00 07 00 00 | 00 00 00 0c 00 0a 40 00 |et).....|......@.|
|000006e0| 00 00 00 09 00 00 00 00 | 00 00 00 00 01 58 00 0c |........|.....X..|
|000006f0| 00 0a 00 03 00 00 00 09 | 00 00 00 00 00 00 00 00 |........|........|
|00000700| 01 59 00 0c 00 0a 40 00 | 00 00 00 09 00 00 00 00 |.Y....@.|........|
|00000710| 00 00 00 00 01 a2 00 0c | 00 0a 00 03 00 00 00 09 |........|........|
|00000720| 00 00 00 00 00 00 00 00 | 01 a3 00 0c 00 0a 40 00 |........|......@.|
|00000730| 00 00 00 09 00 00 00 00 | 00 00 00 00 02 23 00 0c |........|.....#..|
|00000740| 00 0a 00 03 00 00 00 09 | 00 00 00 00 00 00 00 00 |........|........|
|00000750| 02 24 00 0c 00 0a 40 00 | 00 00 00 09 00 00 00 00 |.$....@.|........|
|00000760| 00 00                   |                         |..      |        |
+--------+-------------------------+-------------------------+--------+--------+